library(ggplot2)
library(tidyverse)
library(scales)
library(plotly)

cc_list <- readRDS("comp-comp_covid.rds")

Data

cc_list$Data

Case by region

ggplotly(cc_list$`Case by region`)

Cases against Death

ggplotly(cc_list$`Cases against Death`)